VBScript → Lua
This function returns true if the given user is logged in and free.
Please see the Introduction chapter for some usage instructions.
'----------------------------------------------------------------
' IsUserFree
'
' Checks if given user is free or not.
'
' Parameter:
' sNumber extension
'
' Return:
' boolean
'----------------------------------------------------------------
Function IsUserFree( sNumber )
PBXScript.OutputTrace "-------------> IsUserFree ( sNumber = " & sNumber & " )"
Dim bReturn
bReturn = False
Dim Users
Set Users = g_PBXConfig.GetUserByAddress(sNumber)
Dim User
For Each User In Users
PBXScript.OutputTrace "Found user " & User.Name & " with current state " & User.State
bReturn = (User.State = 2)
Next
IsUserFree = bReturn
PBXScript.OutputTrace "bReturn = " & bReturn
PBXScript.OutputTrace "<------------- IsUserFree"
End Function
Please note that the status signalling between all involved users (incl. the one the current call routing runs for) must be configured (just as in SwyxIt!).
This function makes use of the Server Script API functions PBXConfig.GetUserByAddress to resolve all users in the given group and PBXScript.OutputTrace to write trace information into the SwyxServer trace file.
This function was initially posted into this forum topic.
By Tom Wellige